CAAPlanetPerihelionAphelion_UranusPerihelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_UranusPerihelion", k)
}
